Teile einer Anwendung ausblenden

Eine weitere Möglichkeit, Ihre Daten und Programme vor Fehlbedienung oder neugierigen Augen zu schützen, ist das Ausblenden. Dies wird-vom Namen über das Blatt bis zur Arbeitsmappe-durch das Setzen der "Visible"-Eigenschaft gesteuert.

DIE "VISIBLE"-EIGENSCHAFT

Sie ist "Wahr", wenn das Objekt sichtbar ist. Bei einem Diagramm, Dialogblatt, Modul oder Tabellenblatt kann dieser Eigenschaft das benannte Argument "xlVeryHidden" zugeordnet werden. Das Objekt wird ausgeblendet und kann nur sichtbar gemacht werden, indem diese Eigenschaft durch VBA-Code auf Wahr gesetzt wird. Der Anwender selbst kann das Objekt nicht einblenden.

Schreib-Lese-Zugriff.

Syntax

Objekt.Visible

Elemente

Objekt Erforderlich. Steht als Platzhalter des Objekts, dem diese Eigenschaft zugewiesen werden soll.

Anmerkungen

Die Visible-Eigenschaft für ein Element der Pivot-Tabelle ist Wahr, wenn das Element derzeit in der Tabelle angezeigt wird.

Wenn Sie der Visible-Eigenschaft für einen Namen den Wert Falsch zuweisen, erscheint der Name nicht im Dialogfeld "Namen festlegen".

Den kompletten Code dieses Abschnittes finden Sie in der Datei "Sichtbar.xls".

Blätter

BLATT UNSICHTBAR MACHEN

Dazu dient der folgende Code:

ThisWorkbook.Sheets("Tabelle1").Visible = False

BLATT WIEDER ZEIGEN

ThisWorkbook.Sheets("Tabelle1").Visible = True

"SEHR" UNSICHTBAR MACHEN

Die bisher gezeigten Beispiele entsprechen dem interaktiven Ausblenden von Blättern. Die Blätter können vom Benutzer über "Format", "Blatt" wieder auf den Schirm geholt werden.

Wollen Sie diese Möglichkeit ausschließen, dann müssen sie der "Visible"-Eigenschaft das benannte Argument "xlVeryHidden" zuweisen. Blätter, die so verborgen werden, können nur noch mit einem VBA-Programm sichtbar gemacht werden:

ThisWorkbook.Sheets("Tabelle1").Visible = xlVeryHidden

Mappen

Genau genommen können Mappen nicht ausgeblendet werden, sondern lediglich die Fenster, in denen Sie eine Mappe zeigen. Wird eine Mappe in nur einem Fenster dargestellt, entspricht das Ausblenden des Fensters dem der Mappe. Von diesem Fall wollen wir in den folgenden Beispielen ausgehen.

MAPPE UNSICHTBAR MACHEN

ActiveWindow.Visible=False

oder genereller

Workbooks("SICHTBAR.XLS").Windows(1).Visible = False

MAPPE WIEDER SICHTBAR MACHEN

ThisWorkbook.Windows(1).Visible=True

oder genereller

Workbooks("SICHTBAR.XLS").Windows(1).Visible = True

Hinweis Zeilen und Spalten in einer Tabelle können Sie über die "Hidden"-Eigenschaft des Bereichs-Objektes unsichtbar machen. Formeln machen Sie über die "FormulaHidden"Eigenschaft unsichtbar.

Mehr zu diesem Thema in der Visual-Basic-Online-Hilfe unter "Eigenschaften", "Visible-Eigenschaft"

	Copyright © by JOANNEUM RESEARCH Forschungsgesellschaft mbH